domain_int <- read.table("")